{$CLEO .cs}
THREAD 'SPT'

REPEAT
WAIT 0
Actor.StorePos($PLAYER_ACTOR, 21@, 22@, 23@)
if 0AE1: 29@ = random_actor_near_point 21@ 22@ 23@ in_radius 20.0 find_next 1 pass_deads 0 //IF and SET                
JF continue          
IF 056D:   actor 29@ defined
JF continue


0208: 2@ = random_float_in_ranges -20.2 20.2 
0208: 3@ = random_float_in_ranges 9.2 20.2 

04C4: store_coords_to 4@ 5@ 6@ from_actor $PLAYER_ACTOR with_offset 2@ 3@ 0.0 
04C4: store_coords_to 7@ 8@ 9@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0 
0063: 4@ -= 7@ // (float) 
0063: 5@ -= 8@ // (float) 
0063: 6@ -= 9@ // (float) 
4@ *= 40.0 
5@ *= 40.0 
Actor.StorePos(29@, 7@, 8@, 9@)
08C7: put_actor 29@ at 7@ 8@ 9@ dont_warp_gang 
083C: set_actor 29@ velocity_in_direction_XYZ 4@ 5@ 6@ 

//Actor.RemoveReferences(29@)
054E: clear_actor 29@ damage
//Actor.Health(29@) = -1 
//Actor.RemoveReferences(29@)
UNTIL FALSE